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Another New Book: Bag of Tricks 


The authors of Beneath Apple DOS (Don Worth and Pieter Lechner) 
have done it again! This time you get a diskette with four 

powerful disk utilities on it, and a book expaining their use. 
The retail price is $39.95, but I will have them for only $36. 


The utilities are TRAX, INIT. ZAP, and FIXCAT. TRAX examines any 
track on a disk, reading it in as pure nibbles and displaying in a 
partially analyzed form. INIT reformats any track or tracks, 
optionally retaining existing data in whatever readable sectors 
are in the track. You can reorder the sectors, change the volume 
number, and more. ZAP is a general purpose disk utility: sectors 
may be read, written, displayed, modified with a powerful 
assortment of over 50 commands. It works with 13- and 16-sector 
DOS, as well as Pascal and CP/M diskettes. You can even "program" 
in ZAP, with labels, loops, and macro-commands. FIXCAT can 
automatically repair or reconstruct a catalog track by analyzing 
the rest of the disk. 


Beyond the utilities themselves, there is about 40 pages of 
advanced tutorial material which starts where “Beneath Apple DOS" 
ends, 


Unless you are fully satisfied with your present collection of 
disk utilities, you ought to get this set. 


Adding Auto-SAVE to S-C Macro Assembler........Greg H. Anders 
[ Greg is a subscriber from Albuquerque, New Mexico. ] 


One of the nice features of the new S-C Macro Assembler is the 
title directive (.TI). This directive causes a title and page 
number to be printed at the top of each page of an assembly 
listing. The title directive gave me the idea for the 
Automatic Save command program which follows. 


I felt the need for an Auto Save command because of my own 
carelessness. After extensive editing of a rather lengthy 
program, I decided it was a good time to save the program 
before I proceeded. The file names I use are usually 
descriptive and forgettable, so to save a file, I list the 
Catalog, then use the cursor controls to copy the file name. 
After the file name appeared on the screen, I zipped the cursor 
next to the name I wanted to save the file under and, 
succumbing to temporary insanity, typed an "L". The word 
"LOAD" flashed on the screen and my mouth dropped open in 
disbelief. The only sounds that could be heard were the whirr 
of the disk drive and the screams of my new code byting the 
dust cover! 


OFTEN WONDER HOW MACHINE LANGUAGE PROGRAMS WORK? 
Well stop wondering and do something about it! Use DISASM to convert 6502 eachine code into aeaningtull, 
syabolic source. Create a text file which is directly coapatable with DOS Toolkit, LISA and S-C (both 4.0 
& Macro) Asseablers. DISASM handles data tables, displaced object code and even lets you substitute 
MEANINGFUL labels of your own choice (100 comaonly used Nonitor & Pg lero names included in Source fora to 
get you rolling). An address-based cross reference table provides even sore insight into the inner 
workings of aachine language prograas. DISASN 15 an invaluable aid for both the novice and expert alike. 
DISASM (Version 2.2): $30.00 


Utilities For Your S-C Assembler (4.0) 

Enhance Your Asseabler And Reduce Valuable Development Tise With These Handy Support Prograas 
SC.65R: A Global Search and Replace Eliminates Tedious Manual Renasing Of Labels... oe $LO.00 
SC.XREF: A Linenusber-Bbased Global Cross Reference Table For Coaplete Source Docuaentation... @20.00 
SC.1AB: Tabulates Source Files Into Neat, Readable Fors. Encourages Fast, Free-Foreat Entry. $15. 0VU 
SC UTILITY PAK: includes All Three Utilities Described Above (You Save $10.0U)....cecseveress B40. UU 


Avoid A $3.00 Shipping/Handling Charge Sy Mailing Full Payeent With Order 


Each Q¢ The Above Programs Is Supplied In 3.3 DOS Format Unless Otherwise Requested. A Detailed User's 
Manual Js Included. All Progrags Are In Machine Language And Run On Either An APPLE I! or APPLE I] FLUS. 


RAK - WARE 
41 Ralph Road 
West Orange NJ 07052 
(201) 325-1885 
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I decided to try to simplify the task of saving a program, 
giving myself less chance of making an error. From this came 
the Auto Save command. With this command, typing SAVE does not 
Save your program on cassette. Instead, the SAVE command 
searches your source program for a title. If a title is found 
and it is a valid DOS name, the source program is automatically 
saved, using the title as the file name. In addition, if you 
end your title with a version number in the form N.N, Auto Save 
automatically increments the version number in the source 
program and saves the program using the new version number. 

The version number option does not erase your old file, which 
means your Old file is a back-up. Be careful, though. A few 
saves and your disk is full of back-up files. You'll need to 
go back and delete a file or two every once in a while. 


The version number goes up to a maximum of 9.9, after which it 
Starts back at 0.0. If the version number option is not 
desired, don't put a number in the form N.N at the end of your 
title, 


Leading and trailing blanks are ignored by Auto Save. If there 
is more than one consecutive blank in a title, the blanks are 
compressed to one. Thus, the title ".TI 56,TI TLE" 
generates a SAVE to the file named "TI TLE". Also, any commas 
in your title are changed to dashes so as not to confuse DOS. 


Time II 


The most powerful, easiest to use, clock for your APPLE 


@ TIME IN HOURS. MINUTES AND SECONDS. 
@ DATE WITH YEAR, MONTH, DAY OF WEEK AND LEAP YEAR. 


@ FAST DATE AND TIME SETTING. 


@ PROGRAM SELECTABLE 24 HOUR MILITARY FORMAT OR 12 
HOUR WITH AM/PM FORMAT. 

@ WILL ENHANCE PROGRAMS FOR ACCOUNTING. TIME AND 
ENERGY MANAGEMENT, REMOTE CONTROL OF APPLIANCES, 
LABORATORY ANALYSIS, PROCESS CONTROL, AND MORE. 

® DIP SWITCH SELECTABLE INTERRUPTS PERMIT FOREGROUND! 
BACKGROUND OPERATION OF TWO PROGRAMS SIMULTA— 
NEOUSLY. 


@ INCLUDES DISK CONTAINING MANY TIME ORIENTED UTILITIES, 


@ CRYSTAL CONTROLLED FOR .0005% ACCURACY. PLUS OVER 25 USER CONTRIBUTED PROGRAMS AT NO EXTRA 

© THE EASIEST PROGRAMMING IN BASIC. cost 

@ON BOARD BATTERY BACKUP POWER FOR OVER 4 MONTHS 
POWER OFF OPERATION (BATTERY CHARGES WHEN APPLE IS © TWENTY-THREE PAGE OPERATING MANUAL INCLUDED, WITH 
ON). MANY EXAMPLES OF PROGRAMS TO USE WITH YOUR APPLE IN 


ANY CONFIGURATION. 


ALL ORDERS SHIPPED SAME DAY 
SEND $129.00 CHECK OR MONEY ORDER 


(TEXAS RESIDENTS ADD 5% SALES TAX) MASTER CHARGE & VISA WELCOME 
ADD $10.00 IF OUTSIDE U S.A. ¥ 5 | a 
MasterCard 
APPLIEO EN@INEFANG pal none 
P.O. BOX 470301 7:00 AM - 11:00 PM 7 DAYS A WEEK 
DALLAS, TEXAS 75247 APPLE PERIPHERALS ARE OUR QNLY BUSINESS 
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To use the Auto Save command, the vector address of the SAVE 
command must be changed. The address must be one less than the 
actual start of the Auto Save command. For example, if Auto 
Save is assembled at $800, the address would be changed in the 
table inside the S-C Macro Assembler to SO7FF. 


For the version of the S-C Macro Assembler which loads at 
$1000, change-the contents of address $1679 to $07 and $1678 to 
SFF. Shown as a monitor command, this would be: 


:$1678:FF 07 


For the Language Card version of the S-C Macro Assembler, 
change the content of address $D679 to $07 and $D678 to SFF. 
You have to write-enable the card first: 


:$C083 C083 D678:FF 07 


I like to keep Auto Save behind the Language Card version of 
the Macro Assembler. I put the program at $F320 and the 
changes are: 


:$C083 C083 D678:1F F3 


ATTENTION MX-8S0 OWNERS! 


Are you frustrated by all those great programaable features on your MX-80 printer? Would you like to sake 
use of the various font coabinations but can’t remeaber the commands? Are you annoyed that your MX-80 
doesn’t skip over the perforation? Would you like your hard copy output documented with a title, date and 
page number? If your answer to these questions is YES, then read on. 


INTRODUCTING THE MX-80 FORMATTER ROM 
Now you can easily obtain full control of your printer. The MX-80 Formatter program is contained 1n ROM so 
its always on-line. It provides a convenient aethod for aanually setting the MX-80 to the configuration 
YOU want without the need for special disk-based software drivers. This printer utility 15 user-friendly 
and simple to operate. A printer attributes list clearly displays the current comsand status. Changes to 
printing fonts, line length, foras length, date, title, etc are easily perforaed. 


The For@atter ROM is currently configured for use with MX-90 or MX-B0FT printers with GRAFTRAX. Requires 
an APPLE II or APPLE I] Plus with either an Epson, Tymac or equivalent parallel printer inter¢ace card. 
Foraatter ROM plugs directly into either Mountain Coaputer’s KoaPlus board or DataShift’s MiniRom board 
(SPECIFY with your order which ROM board you are using since their formats are different). 


MX-80 Formatter RUM: $29.00 
Avoid A $3.00 Shipping/Handling Charge By Mailing Full Payaent with Order 


RAK - WARE 
41 Raiph Road 
West Orange NJ 907052 
(201) 325-1885 
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One thing you'll have to look out for. If you type an illegal 
DOS SAVE command such as “SAVE 1 4 THE ROAD", DOS ignores this 
command and the Auto Save goes into effect; the "1 4 THE ROAD" 
is ignored. Also note that the save is performed on the drive 
that is active. Since commas are changed to dashes, there is 
currently no way to specify which drive you want the save to be 
performed on. Perhaps you would like to try to implement this 
enhancement yourself. 


After you've installed the Auto Save program, type in this 
program: 


1000 * A TEST OF AUTO SAVE 
1010 -TI 54, TITLE TEST VER. 0.9 


Then type SAVE, and CATALOG. See how the file was saved? List 
the file and notice the change in line 1010. Voila! 


For those of you who haven't updated to the Macro Assembler 
yet, Auto Save can be implemented with S-C Version 4.0 by using 
the .US command for the title. The changes which are necessary 
are outlined below. 


1. The following lines must be deleted: 1490-1540, 
2090-2150, 2460-2470, 2560-2930. | 


2. The following lines must be added: 


1210 ~-US S-C VER. 4.0 AUTO SAVE 1.0 
1600 BNE .2 -« eALWAYS 

1920 * CHECK THE OP CODE FOR .US 

2170 BCS TITLE 

2480 .1 CMP #$80 


3480 OPS AS /.US/ 
3510 NO.TTL .AS /*** NO TITLE ERRO/ 


3515 -AS —-/R/ 
3520 -AS /*** ILLEGAL TITLE FIRST CHARACTE/ 
3525 -AS -/R/ 


3. Change the SAVE vector address. For an origin of 
$800, that would be 


:$1271:FF 07 
4. To use the command, put the title you want to use for 


the file name like so: 
~-US MY TITLE VER. 1.0 
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1000. @seceteencleso occu nceesestacacses 
1010 # AUTOMATIC SAVE PROGRAM 
1020 # THIS PROGRAM CHECK'S FOR A TITLE 
1030 s AND IF ONE IS FOUND THE CURRENT PROGRAM 
1040 # IS SAVED UNDER THE TIT 
1050 & ALSO, IF THE VERSION HUNBER IS APPENDED 
1060 : IT I$ UPDATED BEFORE EACH SAVE 
1080 & SYSTEM EQUATES 
1090 ®sscescc- Gee cn coe neeececesecs 
ED- 1100 MON.COUT  .EQ 
FD8E- 1110 MON.CROUT <.EQ $FD8E 
FBDD- 1120 MON . BELL -EQ FBDD 
004¢c- i180 SRC.END 5EQ $4C,4D 
OOCA~ 1150 SRC. START -EQ CA, CB 
001E- 1170 SEARCH “EQ $1E, 1F 
1190 OR 
1200 . “TF AUTO.SAVE.OBJECT A$800 
1220 # INITIALIZE SEARCH REGISTERS AND 
1230 * DETERMINE IF AT END OF SOURCE PROGRAM 
1250 AUTO. SAVE 
0800- A5 CA 1260 LDA SRC.START GET START OF SOURCE PROGRAM ADDRESS 
0802- 85 1E 1270 STA SEARCH AND MOVE TO THE SEARCH ADDRESS 
O804- A5 CB =: 1280 LDA SRC.START+1 REGISTER 
Seep. DB AB8e in ea 
1310 ADDRESS.END.CMP 
0809- A5 1E 1320 LDA SEARCH 
O80B- C5 4C 1 30 CMP SRC.END SEE IF AT END OF SOURCE PROGRAM 
On OD tat 1380 EDA SEARCH+1 
- + 
0811- C5 4D 1360 CMP SRC.END+1 
0813- FO 2F 70 BEQ ERROR1 DIDN'T FIND TITLE 
1390 : SEARCH LINE FOR OP CODE 
0815- AO 00 3=1410 .1 LDY # x OFFSET FOR LINE EXAMINATION 
08 17 - BI IE 1420 LDA (Seancy) ,t NEXT LINE OFFSET 
081B- AO 0 iuko LDY #3 POINT TO CHARACTER AFTER LINE NUMBER 
1D= Bi 1 1450 LDA ARCH) ,Y 
ent iy ert Sen NEW.LINE yep Ee? 
0 23- C9 CO 1480 5 CMP #$C0 COMPRESSED CODE? 
0825- DO 05 1490 BNE . NOPE 
0827- C8 1500 .4 INY MOVE OFFSET PAST COMPRESSED INFO 
6829-88 1220 cLy 
082c- C9 80 ~—_—«* 150 12 CMP #380 SPACE(S)? 
082 - BO 3) 1350 : BCS OPCHK YES, CHECK THE OP-CODE 
0831- B1 1E 1570 LDA (SEARCH) ,Y 
833 FO 02. ~= 1580 BEQ NEW.LINE END OF LINE (EOL) IS 0 
- DO EC 1590 . BNE .5 .. ALWAYS 
1610 > CALCULATE ADDRESS OF NEXT LINE 
1630 NEW. LINE 
31 18 1640 CLC 
838- A5 1 1650 LDA SEARCH MOVE SEARCH ADDRESS TO NEXT LINE 
OF 3A 82 ip 4888 STA SEARCH 
B3E- 0 ca 1660 BCC ADDRESS, END.CMP 
- £6 1 1690 INC SEARCH+1 
O842- DO C5 1700 BNE ADDRESS.END.CMP-... ALWAYS 
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1710 Seam nnnnne neem ene enn een een ne we 
1720 ® ERROR ROUTINES 
1730 a 
1740 ERROR1 
O844— AO 00 1750 LDY #0 POINT TO NO TITLE ERROR 
0846- B9 54 09 1760 PRTERR LDA NO.TTL,Y 
O849- 30 08 1779 BMI ERREND 
O84B- 09 80 1780 ORA #$80 
O84D- 20 ED FD 1790 JSR MON.COUT 
0850- C8 1800 INY 
0851=- DO F3 1810 BNE PRTERR 
0853- 20 ED FD 1820 ERREND JSR MON.COUT 
0856- 20 DD FB 1830 JSR MON.BELL1 
082 2- 20 DD FB 18 0 JSR MON.BELL1 
085€- 20 BE FD 1850 JSR MON.CROUT 
O85F- 60 1860 RTS 
1 9 ERROR2 
0860- AO 12 1880 LDY #18 POINT TO ILLEGAL CHAR. ERROR 
0862= DO E2 1838 : NE PRTERR  ...ALWAYS 
1310 CHECK THE OP CODE FOR .TI 
0864= A2 00 1930 OPCHK LDX #0 
0866- C8 19h0 .1 INY 
0867- B1 1E 1950 LDA (SEARCH) ,Y 
0869- FO CC 1960 BEQ NEW.LINE OL 
O86B- DD 4C 09 1970 CMP OPS,X COMPARE OP CODE 
O86E=- DO C7 1980 BNE NEW.LINE THAT'S NOT IT 
0870- E8 1990 INX 
0871=- EO 0 2000 CPX #3 IF ALL 3 COMPARE, FOUND OP CODE 
0873- DO F 2010 BNE . 
2020 Sennen nnn nnn nn nnn nnn nn ne nnn 
20 0 : NOW LOOK FOR TITLE 
0875 C8 2050 TITLE INY 
0876- Bi 1E 2060 LDA (SEARCH) »¥ 
0878=~ FO CA 2070 BEQ ERROR1 ‘NO TITLE? 
O87A- C9 2C 2080 CMP # LOOKING FOR COMMA (TITLE FOLLOWS) 
087C= DO F7 2090 BNE TI rte 
O87E- C8 2100 .1 INY 
O87F- B1 1E 2110 LDA (SEARCH),Y 
0881~ FO C1 2120 BEQ ERROR1 NO TITLE? 
0883- C9 CO 2130 CMP #$CO OMPRESSED? 
0885— FO 40 2140 BEQ COMP.COD 
0887- C9 80 2150 CMP #$80 SPACE? 
0889- BO F 2160 BCS . YEP=-SKIP 
O88B- C9 4 2170 CMP #'A MAKE SURE 1ST CHAR. IS LETTER 
O88D- 90 D1 2180 BCC ERROR2 NOT LETTER 
O88F~ C9 5B 2190 CMP #$5B 1 MORE THAN "Zz" 
0891- BO CD 2200 BCS ERROR2 
2210 Samm mnnnnnn nnn annem enw ee nn eee ne= 
2220 # TITLE FOUND 
22 9 : OUTPUT CTRL-D, "SAVE" AND TITLE 
089 - 48 2250 PHA 
0894—- A2 00 2260 LDX #0 
0896=- BD AF 09 2270 .2 LDA SAVE,X 
0899- 20 ED FD 2280 JSR MON.COUT 
089C- E8 2290 INX 
O89D- EO 05 2300 CPX #5 
089F- D9 F5 2310 BNE . 
O8Ai- 6 2320 PLA 
2330 NEXT.CHAR1 
OBAa CODED ED S360 Oe aon Cour 
O8A7—- E8 2360 INX X KEEPS TRACK OF INPUT BUFFER OFFSET 
2370 NEXT.CHAR2 
BRACE ETE’ S200 LDA (SEARCH) ,Y 
O8AB- FO 56 tity BEQ GOT.TTL2 EOL--GOT THE TITLE 
O8AD- C9 2C 2410 CMP #', NO COMMAS ALLOWED 
O8AF- DO O04 2420 BNE .1° 
O8B1- AQ 2D 2430 LDA #'- REPLACE COMMA WITH DASH 
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DO ED = 2440 BNE NEXT.CHAR1 ». ALWAYS 
C9 CO 3—_ 24550 1 CMP #$C0 
FO 2F 2460 BEQ COMP.CODE2 
C9 80 =—_ 2470 CMP #$80 
90 E5 2480 BCC NEXT.CHAR1 
C8 2490 INY CHECK FOR CHARACTER AFTER SPACE 
B11E 2500 LDA (SEARCH) ,Y 
FQ 40 2510 BEQ GOT.TTL1 DROP TRAILING SPACES 
2520 DEY MOVE POINTER BACK TO CORRECT POSITION 
A9 20 ~=—- 2530 LDA #$20 SPACE--SPACES IN TITLE COMPRESSED TO 1 
DO DB 25 0 : BNE NEXT.CHAR1 .. ALWAYS 
25 08 COMPRESSED CHARACTER ROUTINES 
a 2580 COMP.CODE1 
B1 1E 3280 LDA (SEARCH),Y | THIS IS NUMBER OF CHARACTERS 
85 1D 2610 STA NEXT COMPRESSED 
C 2620 INY 
B11E 2630 LDA (SEARCH),Y | ACTUAL CHARACTER 
co 41 2640 CMP #'A MAKE SURE IT'S A LETTER 
90 8D 2650 BCC ERROR2 
C9 5B ~—- 2660 CMP #$55 
BO 9 2670 BCS ERROR2 
i 2680 PHA 
A2 00 2690 LDX #0 
BD 4F 09 2700 .1 LDA SAVE,X 
20 FD FD 2710 JSR MON. COUT 
E8 2720 INX 
EO 05 = 2730 CPX #5 
DO F5 2740 BNE .1 
68 2190 PLA 
D0 OE «2 NE STORE »» ALWAYS 
2770 COMP.CODE2 
c8 2780 
B11E 2790 LDA (SEARCH) ,Y 
85 1D 2800 STA NEXT 
cB 2810 INY 
B11E 2820 LDA (SEARCH) ,Y 
C9 2C~—s 2830 CMP #! 
DO 02 «= 28 40 BNE STORE 
A9 2D ~—.2850 LDA #'- 
2860 STORE 
09 80 2870 ORA #$80 
20 ED FD 2880 JSR MON. COUT 
E8 2890 INX 
C6 1D = 2900 DEC 
DO F6 = 29110 BNE 
FO A6 2920 E BEQ NEXT. CHAR2 
29 08 SEARCH FOR VERSION NUMBER AND CHANGE IF FOUND 
= 5820 GOT .TTL1 
5980 GOT. TTL2 
88 2390 DEY MOVE Y POINTER TO THIRD NON-BLANK 
3000 DEY CHARACTER FROM THE END OF LINE 
88 3010 DEY 
CA 3020 DEX 
B1 1E 3030 LDA (SEARCH) ,¥ THIRD CHAR. FROM END 
C9 30 040 CMP #'0 
90 3B 3050 BCC DOS.OP 
C 3A 060 CMP #!: ASCII ":" IS 1 MORE THAN ASCII 9 
BO 37 070 BCS DOS.OP 
C 080 INY 
B11E 3090 LDA (SEARCH),Y | 2ND CHAR. FROM END 
C9 2E 100 CMP #', SHOULD BE PERIOD 
DO 30 110 BNE DOS.OP 
C 120 INY 
B1 1E 3130 LDA (SEARCH),Y | LAST CHARACTER 
C9 30 140 CMP #'0 
90 29 3130 BCC DOS.OP 
C9 3A 160 CMP #!: 
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0921- e9 25 3170 BCS lee 


0923- 69 01 3180 ADC 

0925- C9 3A 190 CMP #'; 

0927- DO 18 200 BNE STORIT 

0929- AJ 30 3210 LDA # 

092B- 91 IE 3220 STA (SEARCH), Y CHANGE DIGIT IN SOURCE CODE 

092D=- 09 80 230 ORA #$80 

O92F=- 9D 00 02 3240 STA IN.BUF,X CHANGE DIGIT IN DOS COMMAND 

0932- CA 3250 DEX 

0933- CA 3260 DEX 

0934- 88 3216 DEY 

0935- 88 280 DEY 

0936- Bi 1E 290 LDA (SEARCH) ,Y 

0938- 1 300 CLC 

0939- 69 01 10 ADC #1 

093B- C9 3A 3320 CMP #' 

093D- DO 02 33h0 BNE STORIT 

093F=- AX 30 3340 LDA #'0 

0941=- 91 IE 3376 STORIT STA Ve abi > 4 

0943- 09 80 0 ORA 

0945=- 9D 00 02 33 : : STA iN. BUF ,X 
3780 ba CR OUTPUT CAUSES DOS TO PERFORM SAVE 
ite ; AFTERWARDS, RETURN TO ASSEMBLER 


O948- 20 BE FD 3420 DOS.OP ane MON .CROUT 


O9NC- ZF 54 49 3470 OPS «AS fT 
Bi ; 3480 SAVE S 4 CTRL-D 


0953- C 3490 eAS -/SAVE/ 


0963- 52 4F D2 3500 NO.TTL .AT /##® NO TITLE ERROR/ 


0966— 2A 2A 2A 

0969=- 20 49 AC 

096C- iC 45 4 

O96F- 41 AC 2 

0972= 54 49 54 

0975= 4¢C 45 20 

0978- 46 +3 52 

O97TB- 53 Ff 20 

O97E- 43 48 41 

0981- 52 41 43 

O984— 54 45 De 3510 eAT goer ILLEGAL TITLE FIRST CHARACTER/ 
0987- 520 ZZZEND .EQ ® 

0187- 0 ZZZLEN .EQ ZZZEND-AUTO.SAVE 
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AED -- A New Applesoft Program Editor.........e..eReviewed by 
Bob Sander-Cederlof 


One of the joys of putting the Apple Assembly Line out each 
month has been the knowledge that a lot of readers are putting 
making good use out of what I print. A case in point: William 
Linn, of Lithonia, Georgia, was inspired by a combination of 
several articles! to produce a new software product we all can 
use! 


He calls it AED, which stands for Applesoft EDitor. AED 
combines in one easy-to-use package: 


Line Editing as in PLE and the S-C Macro Assembler 
Automatic Line Numbering 

Global Search and Replace (with wildcard matching) 
Controlled LISTing (Page- or Line~at-a-time, and Slow 
Scroll) 

Display of Variables after execution 

Quick entry of DOS commands from a mini-menu 

And a lot more. 


I said it is easy to use. Why? Here are a few reasons: 


The screen is split, with the line being entered at the 
bottom 6 lines and two possiblities for the top 18 lines. 
The top 18 lines are used for listing or for display of 
the most frequently used commands and edit controls. 


The commands and edit controls are single letters or 
control-letters, with mnemonic value. 


An inverse letter appears before the prompt character 
indicating which of six special modes you are in, so you 
don't get lost. 


Clicks and tones provide pleasant feedback at appropriate 
times. 


One very unusual feature, which I have grown to love in a very 
short time, is a new kind of cursor. Rather than the flashing 
cursor of the standard Apple input routines, AED alternates the 
underline character with the character already on the screen. 
This alternation is done at the same rate as the Apple's 
flashing mode, but doesn't tire the eyes. 


AED loads into memory from $8500 through S$95FF, and uses a 
256-byte buffer from $8400 to S84FF. HIMEM is set to §83FF. 


AED is normally in charge of all input, until the Control-Q 
-command (QUIT) is typed. If you type a letter A, C, E, F, L, 
M, R, S, or V the rest of the AED command starting with that 
letter will be displayed. If the command requires no 
additional information, it is immediately executed. Otherwise, 
it waits for you to finish the command and type a carriage 
return. The period is also a command: call it “dot", and 
think of "DOS", because its purpose is to call up the DOS 
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Command Mini-Menu. If you type a line beginning with a 
non-command character, it is passed on to Applesoft. Thus you 
can énter numbered lines, or type immediate mode commands such 
as NEW or PRINT X(3) or PR#1.I£ you do leave AED control, 
typing "&" will enter AED again. If you have the Autostart 
Monitor, hitting RESET will re-enter AED. 


It is important to realize that you are always in an editing 
mode. Even commands can be edited using the edit control keys. 


Here is a list of the commands: 


Letter Commands Editing Commands 
A AUTO line #,increment “B Cursor to beginning 
C CHANGE /stringl/string2/A “D Delete a character 
E EDIT line # “E Cursor to end of line 
F FILE = filename to use in “Fx Cursor to next "x" 
DOS commands “I Begin Insert mode 
L LIST [ line #,line # ] “M (RETURN) Submit line 
M MANUAL line numbering “N Cursor to end of line 
R Repeat last LIST command “R Recall last line edited 
S SEARCH /string/ “tx Delete through next "x" 
V Variable display “r“P Delete to end of line 
- DOS Mini-Menu “vy Next character verbatim 
“w Enter word cursor mode 


Control Commands 


“A Assistance 

“C Clear Scroll Area 
“Q Quit 

“xX Clear Edit Area 
ESC Edit Next Line 


AED does not have user-defined keyboard macros. The keyboard 
macros in PLE are a big selling point; however, the ones you 
actually end up using in PLE are built-in to AED as actual 
commands or as part of the DOS Mini-Menu. Of course, PLE words 
with both Integer BASIC and Applesoft; AED is only for 
Applesoft. 


If you use Applesoft, are not already firmly addicted to PLE, 

and if you do not use Integer BASIC, then you should consider 

picking up a copy of AED. It is only $40 (same price as PLE), 
and packs a lot of usefulness for the dollars. 


Apple Assembly Line....April, 1982....Copyright (C) S-C SOFTWARE....Page 11 


WHETHER YOU ARE AN ASSEMBLY LANGUAGE 
PROGRAMMER, OR NOT, YOU NEED 
THE UNIVERSAL BOOT INITIALIZER 4.0 (UBI 4.0)#* 


HERE ARE THE REASONS WHY: 


@ UB I 4.0 CREATES COPYABLE DOS 3.2.1 AND DOS 3.3 DISKS that fast- 
load the Language Card or any RAM card on boot in 1.7 seconds and 
execute a BASIC, Binary or EXEC greeting program in Drive 1 or 2. 


e UB I 4.0 CREATES COPYABLE DOS 3.3 DISKS that fast-load the RAM 
card on boot with the "missing" BASIC or with an assembler program 
-- such as the S-C MACRO Assembler -- in 1.7 seconds. 


@ U B I-CREATED DOS 3.3 DISKS NOW INCLUDE THE DOS ENHANCER which is 
completely transparent to the user and allows (B)LOADing and 
(B)RUNning all files (Binary, Applesoft and Integer BASIC) up to 
500% faster. 


@ THE DOS ENHANCER IS COMPLETELY COMPATIBLE WITH ALL APPLE )[{ DOS 
3.3 PROGRAMS (including all versions of the S-C Assembler). 


e UB I 4.0 NOW ADDS THE “FREE” COMMAND TO DOS which allows you to 
determine free space on your disk in“any slot, any drive”-- from 
the command mode or from the program mode. 


® UB I 4.0 INCLUDES A SUPPORT DISK that allows restoration of DOS 
to its normal state or to a modified DOS that allows INITting 
data disks without DOS, thus freeing up 32 extra sectors. 


@ UB I 4.0 COMES WITH A TRAINING DISK, A DEMO DISK, A SUPPORT DISK 
AND COMPLETE DOCUMENTATION. 


@ UB I 4.0 SYSTEM REQUIREMENTS: APPLE J{ or J[+, RAM or ROM Card, 
DOS 3.3 or DOS 3.2.1, 48K RAM, one or two DISK J[ drives. 


e A SPECIAL INTRODUCTORY PRICE OF $64.95 for the new U BI 4.0 is 
available to Apple Assembly Line readers until May 1Ist. 


*UBI 4.0 is the "direct descendent” of UB I 3.0 which received high 
marks from Chuck Carpenter in March 1st Infoworld and received a double 
"AA" rating from John Mitchener in February's PEELINGS II. 


TO ORDER: 
CREDIT CARDS -- VISA, MASTERCARD or AMER EXPR: 


Call Cybertronics International Inc. 
Clearinghouse: (212) 532-3089 


MAIL ORDER -- Send check or money order to: 
S&H Software e Box 5 e Manvel e ND 58256 


Box 5 ¢ Manvel e ND 58256 


S&H Software 
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Ashby'‘s Easy Shift-Key Modifier..........e-Bob Sander-Cederlof 


How many times have you read or heard about a way to modify 
your Apple so that the shift-key would function like a normal 
typewriter? It is a relatively safe and easy thing to do, but 
the directions can really be frightening. 


Words like "solder", “wire", “take the bottom off your Apple", 
and so on. 


If you have an Apple with the piggy-back board hanging down 
under your keyboard (Revision 7 or newer), take heart! There 
is a little device you can pick up for only $15 postpaid, 
called Ashby's Shift-Key Modifier, which hooks up the 
modification without any tools or trouble. And it only takes a 
Minute or so! (In fact, only a few seconds if you have done it 
a few times like I have.) 


The Modifier consists of a piece of wire fitted with a plug for 
the game connector on one end, and with a clip on the other 
end. The plug is devised so that you still have an empty game 
socket on top, for attaching paddles or whatever. 


To install the Modifier, all you have to do is insert the plug 
into the game socket, and clip the other end onto the connector 
from the keyboard to the piggy-back board at the second wire 
from the right (the RESET key side). 


I have installed them on all my Apples, except for my oldest 

one. (That one is serial #219, bought in August of 1977, and 
is so old it doesn't even have ventilation slots on the case! 
Yes, I installed the open-case-and-solder-a-wire modification 
in the old one.) 


Now I can use the shift-key the way I was taught in typing 
class when I am using Data Capture 4.0, SuperText II, Apple Pie 
2.0, the S-C Macro Assembler, or the Word Handler. And more 
and more programs are being created to take advantage of a REAL 
shift key on an Apple. 


The normal retail price of the Ashby Shift-Key Modifier is $18. 


I have bought a bunch of them, and you can have them for only 
$15 each. They come complete with directions for installation. 
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Potential Trouble in TYMAC......ccecccececeee -RODErt H. Bernard 
[ Bob is a subscriber in Westport, Connecticut. ] 


The article by Peter Bartlett on improving the Epson Controller 
Card (which appeared in the February 1982 issue of AAL) has 
prompted me to write to bring to the attention of fellow AAL 
readers that the TYMAC controller card, which is a lower-cost 
alternative to the official Epson card, has a potentially 
serious problem. 


To achieve slot independence, controller card ROM programs JSR 
to an RTS instruction in the Monitor. Then they extract the 
slot from the return address the JSR put on the stack. The 
Apple II Reference Manual details the process on page 81-82. 


Most controller cards use the Apple technique verbatim, JSR‘'ing 
to SFF58, which is an RTS instruction in the Monitor ROM. 
However, the TYMAC card JSR's to SFDFF. That location also 
contains an RTS. so there is no problem using the TYMAC card as 
long as the Monitor ROM is enabled. 


The problem occurs when the TYMAC card is used with Pascal. 
While Apple Computer has specifically guaranteed an RTS 
instruction at SFF58 in the Pascal Basic Input/Output System 
(BIOS), no RTS exists at SFDFF. Therefore TYMAC loses control 
and causes a Pascal crash as soon as it is called. 


If any of you have TYMAC cards, and plan to make the Peter 
Bartlett modification (or perhaps even if you don't plan to), 
you should also change the JSR instruction at SOA relative to 
the beginning of the ROM from 20FFFD to 2058FF. 


APPLE MUSIC SYNTHESIZER BREAKTHROUGH 


e COMPLETE 16 VOICE MUSIC SYNTHESIZER ON ONE CARD, JUST PLUG IT INTO YOUR APPLE, CONNECT THE 


Ripe aysonne Pere TO YOUR STEREO AND BOOT THE SUPPLIED DISK AND YOU'RE READY TO ENTER 


e IT’S EASY TO PROGRAM MUSIC WITH OUR “COMPOSE” SOFTWARE. YOU'LL START RIGHT AWAY AT 
INPUTTING YOUR FAVORITE SONGS. OUR MANUAL SHOWS YOU HOW, STEP BY STEP. THE HI-RES SCREEN 
SHOWS WHAT YOU'VE ENTERED IN STANDARD SHEET MUSIC FORMAT. 


e WE GIVE YOU LOTS OF SOFTWARE. IN ADDITION TO “COMPOSE” AND PLAY PROGRAMS, THE DISK IS FULL 
OF SONGS READY TO RUN. 


¢ FOUR WHITE NOISE GENERATORS (GREAT FOR SOUND EFFECTS). 
¢ PLAYS MUSIC IN TRUE STEREO AS WELL AS TRUE DISCREET QUADRAPHONIC. 
e ENVELOPE CONTROL (VOLUME) 


e WILL PLAY SONGS WRITTEN FOR ALF SYNTHESIZER (ALF SOFTWARE WILL NOT TAKE AOVANTAGE OF ALL 
THE FEATURES OF THIS BOARD, THEIR SOFTWARE SOUNDS THE SAME ON OUR SYNTHESIZER). 


¢ AUTOMATIC SHUTOFF ON POWER-UP, OR IF RESET IS PUSHED. 
* MANY, MANY MORE FEATURES. 


ALL ORDERS SHIPPED SAME DAY MASTER CHARGE & VISA WELCOME 
SEND $159.00 CHECK OR MONEY ORDER See: 
(TEXAS RESIDENTS ADO 6% SALES TAX) 


APPLIED ENGINEERING sai (214) 492-2027 
P.O. BOX 470301 7:00 AM - 11:00 PM 7 DAYS A WEEK 
DALLAS, TEXAS 75247 APPLE PERIPHERALS ARE OUR ONLY BUSINESS 
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Decision 
Decision Systems 


6S P.O. Box 13006 
ystems Denton, TX 76203 
; 817/382-6353 


DIS-ASSEMBLER 


DSA-DS dis-assembles Apple machine language programs into forms 
compatible with LISA, S-C ASSEMBLER (3.2 or 4.0), Apple's TOOL- 
KIT ASSEMBLER and others. DSA-DS dis-assembles instructions or 
data. Labels are generated for referenced locations within the 
machine language program. 

$25, Disk, Applesoft (32K, ROM or Language card) 


OTHER PRODUCTS 


ISAM-DS is an integrated set of Applesoft routines that gives indexed file capabilities 
to your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance that match 
products costing twice as much. 

$50 Disk, Applesoft. 


PBASIC-DS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF...ELSE..., CASE, SELECT, and many more. Develop 
programs for Integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 

$35. Disk, Applesoft (48K, ROM or Language Card). 


FORN-DS is a complete system for the definition of input and output froms. FORM- 
DS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features. 

$25 Disk, Applesoft (32K, ROM or Language Card). 


UTIL-DS is a set of routines for use with Applesoft to format numeric output, selec- 
tively clear variables (Applesoft’s CLEAR gets everything), improve error handling, 
and interface machine language with Applesoft programs. Includes a special load 
routine for placing machine language routines underneath Applesoft programs. 

$25 Disk, Applesoft. 


SPEED-DS is a routine to modify the statement linkage in an Applesoft program to 
speed its execution. Improvements of 5-20% are common. As a bonus, SPEED-DS 
includes machine language routines to speed string handling and reduce the need for 


garbage clean-up. Author: Lee Meador. 
$15 Disk, Applesoft (32K, ROM or Language Card). 


(Add $4.00 for Foreign Mail) 


*Apple Il is a registered trademark of the Apple Computer Co. 
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Using Macros and NeSted M@CroS...ccccvcccccecceceeeArt Schumer 


[ Art is a subscriber in Manvel, North Dakota; he is the 
programming side of S&H Software. Art wrote the Universal Boot 
Initializer. The DOS Enhancer, and the AmperCat Utility. ] 


The new S-C Macro Assembler is truly the best assembler around. 
With the addition of Macros, easier programming is limited only 
by your imagination. All you have to do is dream up some uses 
for Macros. Are Macros and Nested Macros really worth using? 
You bet! One of my source files was 104 sectors long, but 
after going back through it and implementing macros, the file 
shortened to only 96 sectors; it was also easier to read. 


As Bob pointed out in the manual, nested macros are allowed in 
this new version, but he frowned on their use. I beg to differ 
with him, as I believe that nested macros can make your source 
files easier to read, as well as easier to write. They may 
seem complex at first, but after setting them up they become 
very easy to use. 


In my example program, I've defined a macro called GOTO.XY that 
will take two variables and use them to position the cursor. 
Another defined macro called CLEAR.XY is a singly nested macro 
that uses GOTO.XY to position the cursor, and then clears from 
there to the end of screen. CLEAR.PRINT.XY positions the 
cursor (uSing GOTO.XY inside CLEAR.PRINT.XY), clears the rest 
of the screen, and prints a message. It may sound confusing, 
but after examining the source listing and th macro 
definitions, it should be easy to understand how this all 
works. 


In all the macros, the first variable is the horizontal cursor 
position and the second variable is the vertical cursor 
position. CLEAR.PRINT.XY calls on a subroutine (JSR PRNT), 
which expects the message to follow the JSR instruction. The 
message is terminated by a 00 byte, and execution proceeds at 
the instruction which follows the message in memory. 


The PRNT subroutine came from a Call A.P.P.L.E. article by Andy 
Hertzfeld. 


Have fun with your new S-C Macro Assembler! 


1000 rd See Sere sere eer een eee we eee oces - 
1010 ® USE OF MACROS & NESTED MACROS 
Le s BY ART SCHUMER - 3/25/82 

FB5B- 1080 VTAB_ .EQ $FB5B 

FC42- aDee CLREOP .EQ $FC 

FC56- 1060 HO «EQ $FC5 

FDOC- 1ObG RDKEY .EQ $FDOC 

FDED- m : cou -EQ $FDED 

0006- 1380 PTR -EQ $6 

0024- 1110 CH EQ $24 

0025- 1120 CV EQ $25 
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QuICKTRACE 


relocatable program traces and displays the actual machine operations, while It Is running 
without interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until itis desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
itions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE allows changes to the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for all this 
information. All this can be done in Single-Step 
mode while running. 


Two optional display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 
program being traced. It will not interfere with 
the stack, program, or I/O. 


QUICK TRACE is relocatable to any free part of 
memory. Its output can be sent to any slot or to 
the screen. 


QUICK TRACE is completely compatible with 
programs using Applesoft and Integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE is 
alive. 


QUICK TRACE is a beautiful way to show the 


incredibly complex sequence of operations that 
a computer goes through in executing a program 


QulcKTRACE $50 


Is a trademark of Anthro-Digital, Inc. 
Copyright © 1981 
Written by John Rogers 


See these programs at participating Computerland and other 
fine computer stores 


Anthro - Digital Software, Inc. 
P.O. Box 1385 Pittsfield, MA 01202 
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1130 besa Seses Scot ete eoeecebooiad 
1180 8 MACRO DEFINITIONS 
1150 
1160 ® CLR.PRNT.XY AND GOTO.PRNT. XY 
1170 # ARE EXAMPLES OF NESTED MACROS 
1190 .MA GOTO. XY 
1200 LDA #]1 
1210 STA cy 
1220 LDA #12 
1230 JSR VTAB 
1240 EM 
1250 Bese ee Se occa ee 
1260 .MA CLEAR. XY 
1270 >GOTO.XY ]1,J2 
1280 JSR CLREOP 
1290 : 
1300 Sennnn nn nnn ween ween we mene een ewenn 
1310 CLEAR. PR 3x 
1320 SCLEAR XT 
1380 
1350 Semcennccoeene se nweencncenesccnn] 
1360 .MA GOTO. PRNT. XY 
1370 TO.XY J1,1]2 
B0 JSR PRNT 
1330 Goce eceme neocon eweeee anounced 
1410 .MA READ. 
1420 $GOTO.XY J1,]2 
1430 JSR RDKEY 
1440 .EM 
1130 5 Re ee Ne ee a oe a a eee ea EaPeS — 
1460 # THE PROGRAM... . 
179 Gece seem ncncw woe eonoennoewan 
0800- 20 58 FC 1480 START JSR HOME 
0803- 1490 >GOTO.PRNT.XY 4,12 
0803- 0000> >GOTO.XY 4,12 
0803- A9 04 00005> LDA #4 
0805- 85 24 000055 STA CH 
0807- A9 0C _—0000>> LDA #12 
0809- 26 5B FB 00005> JSR VTAB 
O80C- 20 6A 08 0000> JSR PRNT 
O80F- D4 C8 C9 
0812- D3 AO C5 
0815= DB C1 CD 
0818- DO CC C5 
081B- AO D5 D3 
08 1E- C5 D3 AO 
0821- CE C5 D 
O824— D4 C5 C 
0827- AO CD C1 
O82A- C3 D2 CF 
O82D- D 1500 .AS -/THIS EXAMPLE USES NESTED MACROS/ 
082E- 00 1510 0 
082F- 1520 SREAD.XY 36 
082F- 0000 >GOTO. XY 36 
O82F- A9 24% 00005 LDA #36 
0831- 85 24  0000> STA CH 
0833- A9 OC 00005 LDA #12 
08 39- 20 5B FB 0000>> JSR VTAB 
0838- 20 0C FD 0000> JSR RDKEY 
083B- 1530 >CLEAR . PRNT. XY zi"? 
08 3B- 0000> >CLEAR.XY 4,1 
083B- 0000>> >GOTO XY 4, ui 
O83B- A9 04  0000>5> LDA # 
083D- 85 24  0000>>> STA CH 
083F~ A9 0C 0000>>>5 LDA #12 
0841- 20 5B FB 0000>>> JSR VTAB 
0844- 20 42 FC 000055 JSR CLREOP 
0847- 20 6A 08 0000> JSR PRNT 
O84A- C1 CE C4 
O84D- AO D4 C8 
0850- C9 D3 AO 
0853- CF CE C5 
0856- AO C1 CC 
0859- D3 CF Al 1540 .AS -/AND THIS ONE ALSO!/ 
085C- 0 1550 °HS 00 
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SUPER FHONE 
For Arrlesoft and DG. C. HAYES MICROMODEM II users only 
Machine lansuasge terminal rrosgram 
Carture data in big buffer or not 
READ or ESAVE or FRINT the buffer 
Keer 3 telerhone directory 
Vial sutomatically from directors 
Call rersons or modems 
Carture Programs from an unattended remote Arrle 
Send rrograms to an unattended remote Arrle 
Time a call 
Transmit or receive machine codes share tables» rrosrams and data 
Answers rhone or ricks uF 
Terminal works with THE SOURCE and all bulletin boards I’ve tried. 


SUPER FHONE is delivered by rhone only. It is all machine 
lensuase but you must have Arrlesoft ur to set it or use it. 
poeaverans it this way rroves it works, I am not selling it on disk 
or ere. 


Almost everythings is done from a menu. If it won’t do as I say 
above 1’11 be glad to sive you a refund but 1/11 deduct the cost of 
the rhone call, It takes about 20 minutes to rut it in sour Arrle,. 
I make calls any time, 


I have to orerate as the rhone comrany does. For nisht and 
weekend delivery send $25.00. For evening delivery send $27.00. For 
weekdsey delivery send $30.00, 


I send the short documentation you need in the mail. Let me 
Know time of day to call.(Eastern Time.) First we’1ll talk» then I’11 
Fut it in your memory and BSAVE it. Then we’ll talk. You don’t have 
to do snythins excert follow a courle of instructions. You can watch 
it enter your memory, 


The reason I am selling for this low rrice right now is that I 
want inreut as to what can be done to imrrove it before I rut it on 
the market» generally. A Frogram which will do what I claim for it 
is worth a lot more than $25.00. Obviously, I can’t distribute many 
cories this way. I will have to shut it off when it gets onerous. 
First come. First served. I refund money if I don’t deliver in two 
weeks. Iton’t call me. I’1l1 call sou. 


Send checks address» rhone number to 
James O. Church 


20 Placid Street 
Trumbully Ct. 06611 
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085D- 1560 >READ . XY “58! 40 


085D- 0000> >GOTO.XY 2 
O85D- AQ 16 0000>> LDA #22 
O85F- 85 2h 0000>> STA CH 
0861- AQ OC 0000>> LDA #12 
0863- 20 5B FB 0000>> JSR VTAB 
0866- 20 OC FD 0000> JSR RDKEY 
0869- 6 Le 6 . 

pe * ANDY HERTZFELD'S PRINT ROUTINE 
O86A- 68 1610 PRNT PLA 
O86B- 85 06 1620 STA PTR 
O86D- 6 1630 PLA 
O86E- 85 0 16 0 STA PTR+1 
O870- AO 0 1650 LDY #0 
0872- E6 06 1660 .1 INC PTR 
O874=- DO 02 1970 BNE .2 
pole: E6 0 i: 0 INC PTR+1 
0878- B1 0 1690 .2 LDA (PTR),Y 
O87A- FO 1700 BEQ “3 
O87C- 20 ED FD 1710 JSR COUT 
O87F=- 4C 72 08 1720 JMP .1 
O882- A5 07 ine 3 LDA PTR+1 
O884- 48 1740 PHA 
0885- 2 06 1750 LDA PTR 
O887—- 4 1760 PHA 
0888- 60 Te RTS 


WRITE NOW 


Southwestern Data Systems, an industry pioneer in innova- 
tive software for the Appie il, is always looking for authors. There 
are no limitations on the size or type of software you can 
submit — utilities, Communication, business, education, or 
games — the only requirement is that it must meet the quality 
standards which typify ail SDS products. When you join the SOS 
team, you get the benefits of a professional support staff 
experienced in providing all you need to get your program to 
market. Here are some of the ways we help you: 


@ TECHNICAL PROGRAMMING ASSISTANCE 

@ UNIQUE COPY PROTECTION W/LIMITED BACKUPS 
@ SUCCESSFUL MARKETING STRATEGIES 

@ ASSISTANCE IN WRITING THE MANUAL 

®@ PROFESSIONAL PRODUCT ARTWORK 

®@ QUALITY ADVERTISING 

@ SUPERIOR PACKAGING 

@ NATIONAL DISTRIBUTION 

@ HIGHEST ROYALTIES PAID MONTHLY 

© CUSTOMER SERVICE SUPPORT 


This is the opportunity you have been waiting for, a chance 
to market your program with the finest publisher in the soft- 
ware industry. Let Southwestern Data Systems’ reputation and 
proven track record for success go to work for you. If you think 
you have what we want — a unique and distinctive software 
package — please cail or write us today! 


P.O. BOX 582 = SANTEE. CA 92071 = (714) 562-3670 


Apple Assembly Line....April, 1982....Copyright (C) S-C SOFTWARE....Page 21 


RecurSive Macro Example....cccccccccveccecccccccces es Lee Meador 


[ Lee is a subscriber from Arlington, Texas. He wrote the 
Original code for the .TF directive and REPLACE command in the 
S-C Assemblers. ] 


Here is short example of a useful macro that uses a recursive 
definition. By recursive I mean that the definition calls 
itself. 


Most large computers have a shift instruction which can shift 
any number of bits; the 6502 shifts only shift one bit at a 
time. The LSR macro shown here accepts a shift count as the 
first parameter, and generates one LSR opcode for each bit 
shift you want. 


The second parameter is optional. If there is no second 
parameter, the A-register will be shifted. If you specify a 
variable for the second parameter, that memory location will be 
shifted. Both cases are shown in the example below. 


How does it work? The definiton says to test the first 
parameter; if it is greater than zero, generate the LSR with 
the optional second parameter as the address field, and call on 
the LSR macro with the first parameter decremented by one. If 
the first parameter is zero (and it eventually will be), no 
code is generated. Read the listing carefully, noting the 
indentation, and you should be able to follow it. 


1000 MA LSR 


1010 "DO 11>0 
1020 LSR J2 
1030 SLSR J1-1, ]2 
1040 FIN 
1050 : 
10 0 et | 
0800- 1070 >LSR 3 $1? 
0000> 
0800- 46 12 00005 ibe 
0802- 0000> SLSR $12 
0802- 46 12 nites BR “hs 
OR OR. 000055 >LSR 3-1-1 $12 
0000>>> DO a5)-19 
oe ae. Ob bOsS> LOR R se le1-1,$12 
0000>>>> .DO 3-1-1- 38 
0000>>>> “FIN 
0000>>> FIN 
0000>> FIN 
806 S300. >ish 2 
0 tT 
a ee fe 
0806- 
te 0000> SLSR 2-1 
0000>> -DO 2-150 
0807 - 4A 0000>> LSR 
0808- 0000>> SLSR 2-1-1 
00005>> -DO 2-1-1350 
0000>5> “FI 
0000>> FIN 
0000> FIN 
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INTRODUCING AED JIC 


A POWERFUL ATID 
FOR APPLESOFT PROGRAM DEVELOPMENT 


A full function line editor surpports character insertions sinsle and multiple 
character deletion, line truncation, instant cursor positioning to a specific 
character, the besdinningd,s or end of any APPLESOFT line. 


All editing functions are in effect while entering new APPLESOFT statements 
as well as revising existing lines of your Basic programs. 


Search your APPLESOFT program for a particular string and immediately begin 
editing the line with the cursor positioned on the matching string. 


Global search and replace one string with another in all or selective lines. 


Wildcard characters supported in searching: /#TAB/ matches HTAB: VTAB: etc. 
Automatic line numberins with user specified increment. 

Sophisticated LIST control allows pade-at-a-time, line-at-a-time, fast and 
slow speed scrolling of APPLESOFT lines. Say soodbyve to CTRL-S and CTRL-C. 


Single key repeat of last LIST command eliminates retyping line number range. 


AED remains resident while RUNnins your APPLESOFT erogram. Sinsle key-stroke 
exit from AED: reentry to AED via & (ameersand) or eressinsg RESET. 


A single key command displays the names and values of each APPLESOFT simple 
variable (very useful in debusding). 


DOS command menu provides CATALOG (D1 or D2), LOAD,» SAVE, LOCK, UNLOCK, or 
DELETE of the current rrogdram via one or two keystrokes. 


Direct keyboard entry of (, Jy \+s and — characters. 


Single key recall of HELP screen, even while editing a line. 


Careful attention to human factors: blinking underscore cursor, soft bell 
tone for errors, visual mode indicator, and minimal keystroke commands. 


AED is 100% Assembly Language and uses approximately 4K RAM. 


System Reauirements: Apple JC with 48K RAM. Applesoft ROM. and DOS 3.3 


AED JC DISKETTE & USER GUIDE:........8$40.00 


DEALER INQUIRIES INVITED 
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Controlling Software Configuration......ceeeeeee2eeDOn Taylor 


Paul Schlyter's article on moving the S-C Assembler into the 
language card (AAL January 1982) couldn't have come at a better 
time for me. I was working on a project that had just outgrown 
the available memory space, and LANGASM came to the rescue. 
Long live LANGASM! 


LANGASM and the extensions to the S-C Assembler that have 
appeared in the AAL bring to the fore an important subject: 
controlling the configuration of your copy of someone else's 
software. 


How do I know that a particular "patched" copy I have of the 
assembler is compatible with another extension that will appear 
in next month's AAL? What kind of documentation must I keep 
somewhere to keep track of patched object code for which I have 
no source code? And how many different patched source code 
versions (to which I have given different names) of the S-C 
Assembler am I willing to keep track of? 


For my use, I've chosen to keep track of only two modified 
copies of the assembler; I call them ASM II.1 and LANGASM.1. 
These two versions are simply the "standard issue" S-C 
Assembler Version 4.0 and LANGASM, each augmented with the 
listed .DA directive patch described by Bob in the December, 
1980 issue of AAL. (I chose this configuration because the 
extension was written by Bob himself, and because other AAL 
articles have used the listed .DA directive. The feature is 
upward compatible, and listed .DAs presented to unmodified 
copies of the assembler will cause invisible errors by 
seemingly accepting those directives, while generating no code 
for items betond the comma.) 


To add the extensions I want, I first load in ASM II.1 or 
LANGASM.1, and then modify the copy in memory with a 
configuration file before using it. 


The source listing of LANGASM.1 EXT.SRC shows the method I use 
to add HOME, COPY and EDIT commands to my copy of LANGASM.1. 
This particular routine is .OR'd at the beginning of one of the 
4K language card memory blocks located at $D000, which permits 
several extensions to be loaded in one contiguous area of 
memory, while leaving the main memory area free for the source 
file and symbol table. 


Lines 1160-1570 install the patches in the memory-resident copy 
of LANGASM.1 and then return to a calling routine. Lines 
1320-1400 patch the FAST command (disabled by the LANGASM 
patches) to render it a HOME command that works like 
Applesoft's does. 


Lines 1260-1430 make similar modifications to LANGASM's command 


table entries, replacing LOAD with COPY and SAVE with EDIT, 
along with their assembled addresses (less one). 
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Lines 1440-1520 are the patches that were contained in Mike 
Laumer's source code for the EDIT command, found in the 
January, 1981 issue of AAL. 


The source files for EDIT and COPY used within LANGASM.1 
EXT.SRC in lines 1590 to the end of the file are identical to 
those written by Mike Laumer and Bob Sander-Cederlof, with a 
couple of exceptions. As stated above, the patch code for NML 
was moved to the modification area in lines 1440-1520. Second, 
all .OR and .TF directives were removed from both files. 
Third, a few redundant .EQ directives (internal assembler 
reference addresses) had to be removed to avoid any EXTRA 
DEFINITION errors. Finally, $D000 was added to all internal 
assembler references to make them compatible with LANGASM's 
SE000 origin. 


To install these patches to LANGASM.1, I EXEC the following 
text file, which I call LANGASM: 


CALL -151 (get into the monitor) 

cocl (turn off any firmware card) 

C081 C081 (write enable the language card) 
BLOAD LANGASM.1 (load LANGASM into the language card) 


BLOAD MONITOR EXTENSIONS (load in page 3 extensions 
from 10/81 issue of AAL) 
BLOAD LANGASM.1 EXTENSIONS (load in the mods) 


A5B8: 80 (patch DOS to use the language card) 
A5C0:81 

300G (install monitor extensions) 

C083 (switch in Bank 2) 

DO000G (install LANGASM mods) 

3D3G (return to DOS and Applesoft) 

INT (enter the assembler) 


To use this method of in-memory configuration with ASM II.l 
(where patches can't always be added in contiguous memory), I 
use a separate file for each command patch, each .OR'd at the 
proper address, and then install all patch routines within a 
Single text file that is EXEC'd. Since I'm not dealing with 
the language card, and each of the commands added above are 
indepedent of one another, I can skip the EXEC and just BLOAD 
and install each command (or group of commands) I want to add 
with the monitor. The result is an easy configuration of the 
assembler, done at run time. 


The use of configuration files to modify the assembler takes a 
few extra seconds (and a couple of extra files on my utility 
disk), but it is no more work thanks to the EXEC file. It 
permits me to keep only a single copy of the assembler (in a 
known configuration), while enabling me to fully document any 
modifications I make to the assembler with configuration files 
for which I have the source code. By creating different EXEC 
files, I can quickly and easily intermix configuration files to 
Create (and document!) any version of the assembler I wish. 


Even though I suppressed the listing of the EDIT and COPY 


commands to save newsletter space, the source code is on the 
Quarterly Disk (#7) which will include this program. 
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NOTE: EDIT FUNCTION SOURCE IS 
ASSEMBLED HERE... 


1000: Mecuessesecenoeeesesce ses sucelese. 
1010 " INSTALL EXTENSIONS TO LANGASM 
1030 ® AUTHOR: DON TAYLOR 
1080 . DATE: 2/6/82, 4:00 PM 
VOC OWiccweeed Soe a 
1070 .OR $D000 
1080 : “TF LANGASM.1 EXTENSIONS 
03D0- 1100 DOS. REENTRY .EQ $03D0 
FC58- 1110 MON.HOME -EQ $FC58 
E2h6- 1120 SCA.LOAD.CMD SEQ $E246 
E26E- 1130 SCA.SAVE. CMD .EQ $E26E 
E273- 1140 SCA.SLOW «CMD .EQ $£273 
1160 INSTALL.MODIFICATIONS 
DOO00- AO 02 1170 LDY #2 MODIFY ASSEMBLER 
DO02= B9 57 DO 1180 .1 LDA HOME.TABLE,Y COMMAND JUMP 
DO05- 93 73 E2 1190 STA SCA.SLOW.CMD,Y 
oo 
DOOB- AQ 5 1220 LDA #MON.HOME-1 
Door he be oo doko TDA YMON HOMES. 
pater BB (DR? agg Set Slav. oes 
DO17- B9 5A DO 1270 2 LDA COPY.TABLE,Y 
DO1A- 98 6 E2 1280 STA SCA.LOAD.CMD,Y 
DO1D= 1290 DEY 
DoPae Ao a 1310 an OPY 1 
Bases RE 1B BL SE poss 
Beet AE ME? 1g BE tol. oes 
DO2C=- B9 5D DO 1320 3 LDA EDIT.TABLE,Y 
DOOF- 99 6E E2 1370 STA SCA.SAVE.CMD,Y 
Dosa. 10 FT «1390 BEL .3 
DO35= AQ 4 1880 LDA #EDIT-1 
pose ae Di ne due OA VEDITGIe 
DO3C- 8D 72 E2 1430 STA SCA.SAVE.CMD+4 
DO3F- AQ 60 1440 LDA #$60 PATCH NML TO 
DOW1- 8D 25 E1 1450 STA $E125 MAKE IT A 
DOWH~ AQ AC 1460 LDA #$4C SUBROUTINE 
DOW6= 8D 63 EO 1470 STA NML 
DOX9- 8D 7B EO 1480 STA $E078 
DOYC- AQ 2C 1490 LDA #NEW. 
DOWE- 8D 64 EO 1500 STA NML+1 
DO51= AQ D1 1510 LDA /NEW.NML 
D053= 8D 65 EO 1520 STA NML+2 
D056- 60 1530 : RTS 
DO57- 48 4F 4D 1550 HOME.TABLE .AS *HOM* 
DO5A- 43 4F 50 1560 COPY.TABLE .AS “COP* 
DO5D=- 45 44 hg 1570 EDIT.TABLE .AS “EDI 
190 # COPY COMMAND FOR S-C ASSEMBLER 
100 * VERSION 4.0 
1839 ® SOURCE: BOB SANDER-CEDERLOF 12/80 
IGN Sasececeeee Gace eee ee nee 
1650 # 
1660 # 
1670 # NOTE: COPY FUNCTION SOURCE IS 
1680 # ASSEMBLED HERE... 
& 
Re 
50 # 
3160 ® 


enh aah enh ond 
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O80D- 20 DA FD JSR une PRINT PAGE NUMBER 


00 8 e nn nnn ww www www ewww ewww eww we 

2 FUNNY NOISE 
C030- fs SPKR .EQ $C030 SPEAKER TOGGLE ADDRESS 
COo00- KYBD  .EQ $C000 KEYBOARD INPUT . 
C010—- 2 STROBE -EQ $C010 KEYBOARD STROBE ©" | 
0000- Is ENTR -EQ 0 ADDRESS OF CURRENT RANDOM VALUE 
0800- 20 58 FC 1090 NOISE JSR gree CLEAR SCREEN, HOME CURSOR 
0803- AO 00 00 NO LDY #0 POINT TO FIRST BYTE IN PAGE 
0805- AQ 00 1 LDA #$D000 START AT $D000 
0807- 85 00 2 STA PNTR 
0809- AJ DO B LDA /$D000 
O80B- 85 01 Ps STA PNTR+ 

{ 

9 

0 


elelelelelelolelelelelelolololeleloleleololelelelolelelelololela) 


ee ee rel eh meek ewe eR ch ee eth we ee we ch ek eB eh ek ek ed we ee ak et ek ed ed 
WGI AD IIA NO PODD|D 1010 DA) 2 ot wt ot tt I IQOOOOODOO0 00 


0810- AD 30 CO N1 LDA SP TOGGLE SPEAKER... 

ae - re 00 nae (PNTR),Y GET HALF-CYCLE TIMER 
apace Ba oe N2 aes an DELAY LOOP FOR HALF-CYCLE 
O81A- DO FH 13 EWP. 2 oe 
081C- E6 01 3 INC PNTR+1 NEXT PAGE 

oye A5 01 LDA PNTR+1 BYPASS I/O AREA 

0892- FO DF 198 BEQ NO 

O824- 20 DA FD q JSR $FDDA PRINT PAGE NUMBER 
O827=- AD 00 CO LDA KYBD SEE IF ANY KEY PRESSED 
O82A- 10 EX 9 BPL N1 NO, KEEP MAKING NOISE 
082C- 8D 10 CO 130 STA STROBE YES, CLEAR STROBE 
O82F- 60 1 RTS THAT'S ALL, FOLKS! 


« JOHN'S DEBUGGER is now in RELEASE 3.0 
aa wi 
. \ 

@ fe 
of 


O 
© 
4s : ? 


"TOTALLY AMAZED - a VERY VALUABLE & NECESSARY PROGRAMMING TOOL" 
Lamy Shockfey, Anchorage AK 


"LEARNED MORE about ASSEMBLY LANGUAGE in 3 HOURS with JOHN'S DEBUGGER than 
in the LAST 3 YEARS - EXCELLENT DOCUMENTATION" 
Jerry Wol{, Riverwoods IL 


O Fee TRACE ocic w/ INSTRUCTION - NOTING ALL UMPS,JSR, etc 
ASSEMBLY LANCUACE PROGRAMMING STEP ACH INSTRUCTION DISPLAYING: 


-EFFECTIVE ADDRESS & MEMORY BOTH Sar aine meee 
-ALL REGS, STATUS & POINTER ~ACCUMUL 

on THE APPLE i COMPUTER ~LAST 8 BYTES ON THE STACK -DISPLAY OF ALL FLAGS SET 
-DISPLAY WHAT IS IN ANY 12 MEMORY POSITIONS WITH LABELS 


OPTIONS CAN BE USED IN ANY ORDER: STEP, TRACE, CONTINUOUS, 
now You CAN TRACE or STEP any 6502 INSTRUCTION RN TO PROCESSING 
A NATED ANYEHERE. IN MEMORY ONE PAGE, SINGLE LINE, MONITOR EXIT & RETU 


JOHN'S DISASSEMBLER (PRINT or VIDEO) 


BEGIN DEBUGGING FROM ANY POINT within YOUR PROGRAM 
COMPUTES EFFECTIVE ADDRESS FOR ALL ADDRESSING MODES BREAKS “GB CHDE TRTO UNDE IS TARDABES Saitiice 
& DISPLAYS ALL MEMORY CHANGES (BEFORE/AFTER) HIGHLIGHTS ALL POSSIBLE LOGIC CHANGES with arrows 
Options to quickly move thru your program-selected (DOES THIS INSTANTLY - NO WAITING) 
memory, equal zero, leave subroutine, etc. 
YOU ARE IN COMPLETE CONTROL OF THE PROCESSOR AS YOU JOHN'S DEBUGGER 49.95 
MOVE THRU YOUR PROGRAM VERIFING INSTRUCTIONS or JOHN'S DISASSEMBLER 19.95 


LOOKING FOR POSSIBLE ERRORS 


BOTH ON DISKETTE 59.95 
BREAKPOINT orcax on KEYPRESS, CYCLE COUNTER,ETC 
(6 OPTIONS) INCLUDES TIMING DELAY FROM 0.0 to 200 SECONDS RADERICK CORA 
(ALL OF THE ABOVE SAVES THE ENTIRE PAGE OF THE STACK) en eniee ep ede anes 
REQUIRES ABR (MACH UANGUAGE USES: FROM E400) TO" 2600; 8635 SHAGROCK: DALLAS, TEXAS 75238:(214) 341-1635 
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Arrange all your equipment together! 

Lock the APPLE II in the ORGANIZER. 

Power strip mounts on rear 

Vented for air flow - room for fan. 

Printer Organizer fits on top or along side. 
Any monitor or portable TV fits on top. 
Simulated Walnut with vinyl coating. 


COMPUTER SYSTEM ORGANIZER $75.00 
PRINTER ORGANIZER 30.00 
6 PLUG POWER SWITCH w/BRKER 25.00 
APPLE II LOCK KIT 25.00 


PEDESTAL STAND w/CABINET (avail soon) 


Computer Fernitere 


a div ef 


S oftware Syeteme Sepport Inc. 


2001 Flagstone Or 
Garland, TX 78042 
214 406-1968 

recording anewer service 


Apple Assembly Line is published monthly by S-C SOFTWARE CORPORATION, P. O. 
Box 280300, Dallas, Texas 75228. Phone (214) 324-2050. Subscription rate is 
$15 per year in the USA, sent Bulk Mail; $18 per year sent First Class Mail in 
USA, Canada, and Mexico; $28 per year sent Air Mail to other countries. Back 
issues are available for $1.50 each (other countries add $1 per back issue for 
postage). All material herein is copyrighted by S-C SOFTWARE, all rights 
reserved. (Apple is a registered trademark of Apple Computer, Inc.) 
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